home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d12
/
v9n13.arc
/
WIPEMEM.SCR
< prev
next >
Wrap
Text File
|
1990-06-14
|
726b
|
32 lines
NWIPEMEM.COM
A100
MOV SP,0178 ;move the stack to just above the program
PUSH CS
POP AX
ADD AX,0012 ;figure the lowest segment ABOVE the program
MOV BX,AX ;...and put it in BX
INT 12
MOV CL,06
SHL AX,CL ;figure the highest segment in use
MOV DX,AX ;...and put it in DX
MOV AL,0 ;fill RAM with 0 -- you can change this
DEC DX
PUSH DX ;start of loop
POP ES
XOR DI,DI
MOV CX,0010
REPZ
STOSB ;fill 16 bytes with what's in AL
DEC DX
CMP DX,BX ;reached the lowest segment?
JNZ 0115 ;if NOT, loop back to start
MOV AX,4C00
INT 21 ;terminate with error code of 0
RCX
28
W
Q